home *** CD-ROM | disk | FTP | other *** search
- object frmPlayer: TfrmPlayer
- Left = 301
- Top = 158
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Diino Player'
- ClientHeight = 222
- ClientWidth = 409
- Color = clWhite
- TransparentColorValue = clFuchsia
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- OldCreateOrder = False
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnHide = FormHide
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object lblTime: TspSkinStdLabel
- Left = 256
- Top = 35
- Width = 28
- Height = 13
- UseSkinFont = True
- UseSkinColor = True
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = -11
- DefaultFont.Name = 'MS Shell Dlg 2'
- DefaultFont.Style = []
- SkinData = SkinModule.sdPlayer
- SkinDataName = 'stdlabel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Caption = '21:59'
- ParentFont = False
- end
- object lblTrackInfo: TBwLabel
- Left = 8
- Top = 35
- Width = 201
- Height = 13
- AutoSize = False
- Caption = '01 - Looong artist name - Long long song title'
- Transparent = True
- ShortenCaption = True
- MinimizePath = False
- end
- object btnRepeat: TspSkinButton
- Left = 216
- Top = 56
- Width = 33
- Height = 25
- Hint = 'Toggle Repeat'
- TabOrder = 0
- DrawDefault = True
- SkinData = SkinModule.sdPlayer
- AreaName = 'repeatarea'
- SkinDataName = 'repeatoffbutton'
- AlphaBlend = False
- AlphaBlendValue = 200
- UseSkinCursor = False
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 14
- DefaultFont.Name = 'Arial'
- DefaultFont.Style = []
- UseSkinFont = True
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinSize = True
- UseSkinFontColor = True
- RepeatMode = False
- RepeatInterval = 100
- AllowAllUp = False
- ShowHint = True
- CanFocused = False
- Action = acToggleRepeat
- Down = False
- GroupIndex = 0
- NumGlyphs = 1
- Spacing = 1
- end
- object tmPosition: TTimer
- Enabled = False
- OnTimer = tmPositionTimer
- Left = 40
- Top = 124
- end
- object TrayIcon: TJvTrayIcon
- Icon.Data = {<image001.ico>}
- IconIndex = 0
- PopupMenu = pmTray
- Visibility = [tvVisibleTaskBar, tvVisibleTaskList]
- OnDblClick = TrayIconDblClick
- Left = 128
- Top = 124
- end
- object pmTray: TPopupMenu
- Left = 164
- Top = 128
- object miShow: TMenuItem
- Caption = 'Show Diino Player'
- OnClick = miShowClick
- end
- object miClose: TMenuItem
- Caption = 'Close Diino Player'
- OnClick = miCloseClick
- end
- end
- object tmStatusFlash: TTimer
- Enabled = False
- OnTimer = tmStatusFlashTimer
- Left = 12
- Top = 124
- end
- object DSF: TspDynamicSkinForm
- UseFormCursorInNCArea = False
- MaxMenuItemsInWindow = 0
- ClientWidth = 0
- ClientHeight = 0
- HideCaptionButtons = False
- AlwaysShowInTray = False
- LogoBitMapTransparent = False
- AlwaysMinimizeToTray = False
- UseSkinFontInMenu = True
- ShowIcon = False
- MaximizeOnFullScreen = False
- SkinHint = SkinHint
- ShowObjectHint = True
- UseDefaultObjectHint = True
- UseSkinCursors = False
- DefCaptionFont.Charset = DEFAULT_CHARSET
- DefCaptionFont.Color = clBtnText
- DefCaptionFont.Height = 14
- DefCaptionFont.Name = 'Arial'
- DefCaptionFont.Style = [fsBold]
- DefInActiveCaptionFont.Charset = DEFAULT_CHARSET
- DefInActiveCaptionFont.Color = clBtnShadow
- DefInActiveCaptionFont.Height = 14
- DefInActiveCaptionFont.Name = 'Arial'
- DefInActiveCaptionFont.Style = [fsBold]
- DefMenuItemHeight = 20
- DefMenuItemFont.Charset = DEFAULT_CHARSET
- DefMenuItemFont.Color = clWindowText
- DefMenuItemFont.Height = 14
- DefMenuItemFont.Name = 'Arial'
- DefMenuItemFont.Style = []
- UseDefaultSysMenu = True
- SupportNCArea = False
- AlphaBlendAnimation = False
- AlphaBlendValue = 200
- AlphaBlend = False
- MenusAlphaBlend = False
- MenusAlphaBlendAnimation = False
- MenusAlphaBlendValue = 200
- SkinData = SkinModule.sdPlayer
- MinHeight = 0
- MinWidth = 0
- MaxHeight = 0
- MaxWidth = 0
- Sizeable = False
- DraggAble = True
- Magnetic = False
- MagneticSize = 5
- BorderIcons = []
- OnMouseUpEvent = DSFMouseUpEvent
- OnMouseDownEvent = DSFMouseDownEvent
- OnMouseMoveEvent = DSFMouseMoveEvent
- OnMouseEnterEvent = DSFMouseEnterEvent
- Left = 8
- Top = 64
- end
- object alPlayer: TActionList
- OnUpdate = alPlayerUpdate
- Left = 216
- Top = 128
- object acPrev: TAction
- Category = 'PlayControls'
- OnExecute = acPrevExecute
- end
- object acPlay: TAction
- Category = 'PlayControls'
- OnExecute = acPlayExecute
- end
- object acPause: TAction
- Category = 'PlayControls'
- OnExecute = acPauseExecute
- end
- object acStop: TAction
- Category = 'PlayControls'
- OnExecute = acStopExecute
- end
- object acNext: TAction
- Category = 'PlayControls'
- OnExecute = acNextExecute
- end
- object acToggleMute: TAction
- Category = 'PlaySettings'
- OnExecute = acToggleMuteExecute
- end
- object acVolumeInc: TAction
- Category = 'PlaySettings'
- OnExecute = acVolumeIncExecute
- end
- object acVolumeDec: TAction
- Category = 'PlaySettings'
- OnExecute = acVolumeDecExecute
- end
- object acTogglePlaylist: TAction
- Category = 'PlaySettings'
- OnExecute = acTogglePlaylistExecute
- end
- object acToggleShuffle: TAction
- Category = 'PlaySettings'
- OnExecute = acToggleShuffleExecute
- end
- object acToggleRepeat: TAction
- Category = 'PlaySettings'
- OnExecute = acToggleRepeatExecute
- end
- object acMinimize: TAction
- OnExecute = acMinimizeExecute
- end
- object acChangeVolume: TAction
- Category = 'PlaySettings'
- OnExecute = acChangeVolumeExecute
- end
- object AcTest: TAction
- ShortCut = 16468
- OnExecute = AcTestExecute
- end
- end
- object SkinHint: TspSkinHint
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = -11
- DefaultFont.Name = 'MS Shell Dlg 2'
- DefaultFont.Style = []
- UseSkinFont = True
- AlphaBlendSupport = True
- AlphaBlend = False
- AlphaBlendValue = 200
- SkinData = SkinModule.sdDynamic
- Active = True
- OnShowHint = SkinHintShowHint
- Left = 288
- Top = 136
- end
- object Boss: TBoss
- Left = 304
- Top = 72
- end
- object tmGraphicsBugFix: TTimer
- Interval = 2000
- OnTimer = tmGraphicsBugFixTimer
- Left = 24
- Top = 160
- end
- end
-